home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1997 April
/
EnigmA AMIGA RUN 17 (1997)(G.R. Edizioni)(IT)[!][issue 1997-04][EAR-CD].iso
/
EARCD
/
docs
/
mags
/
HPool10a.lha
/
HousePool_10
/
HousePool_10-StartMe!
< prev
next >
Wrap
Text File
|
1996-12-22
|
4KB
|
127 lines
; $VER: 1.10 (22.12.96)
; $NAME: HousePool Startup Script
;
FailAt 21
Echo "HousePool Ausgabe 10 wird gestartet..."
Echo "Bitte warten..."
;
Echo "Führe Zuweisung (Assign) aus !"
Assign HousePool_10: "" PATH
Assign Libs: HousePool_10:Libs ADD
If NOT EXISTS T:
MakeDir RAM:T
Assign T: RAM:T
EndIf
Cd HousePool_10:
;
Echo "Variablen werden gesetzt !"
Version >NIL: exec.library 39
If WARN
SetEnv PicViewer "PPShow"
SetEnv AnimView "PPShow"
SetEnv GuideView "ShowGuide"
SetEnv MEDPlay "omp"
SetEnv MODPlay "PowerPlayer"
Else
SetEnv PicViewer "Multiview"
SetEnv AnimView "PPShow"
Version >NIL: exec.library 40
If WARN
Skip OS30
Else
SetEnv AnimView "Multiview"
EndIf
Lab OS30
SetEnv GuideView "Multiview"
SetEnv MEDPlay "omp"
SetEnv MODPlay "PowerPlayer"
EndIf
;
Echo "Anzeiger/Abspieler Gewähltes Programm"
Echo "- Bilder " $PicViewer
Echo "- Animationen " $AnimView
Echo "- AmigaGuide " $GuideView
Echo "- Sound-Module (MOD,OMED,...) " $MODPlay $MEDPlay
Echo "*NVoreinstellungen für Anzeige/Abspiel-Programme getroffen !"
Ask "Möchten Sie diese verändern ? (y/n)"
If WARN
Lab Benutzer
Echo "*NAnzeiger/Abspieler Gewähltes Programm"
Echo "- Bilder " $PicViewer
Echo NoLine "Ihre Wahl : "
Set >NIL: PicViewer ?
Echo "- Animationen " $AnimView
Echo NoLine "Ihre Wahl : "
Set >NIL: AnimView ?
Echo "- AmigaGuide " $GuideView
Echo NoLine "Ihre Wahl : "
Set >NIL: GuideView ?
Echo "- Sound-Module (MOD,OMED,...) " $MODPlay $MEDPlay
Echo NoLine "Ihre Wahl : "
Set >NIL: MODPlay ?
Echo "*NOk. Prüfen Sie bitte, ob Ihre Angaben korrekt sind.*N"
Echo "Anzeiger/Abspieler Gewähltes Programm"
Echo "- Bilder " $PicViewer
Echo "- Animationen " $AnimView
Echo "- AmigaGuide " $GuideView
Echo "- Sound-Module (MOD,OMED,...) " $MODPlay
Ask "Angaben korrekt ?"
If WARN
SetEnv MEDPlay " "
SetEnv MEDPlay $MODPlay
Skip StartHP
Else
Skip Benutzer BACK
EndIf
Else
Echo "Verwende Voreinstellungen !"
EndIf
;
Lab StartHP
Echo $AnimView >t:StartHPAnim "HousePool_10:HP_10-Bilder/HousePool.anim"
Echo $MEDPlay >t:StartTheme "HousePool_10:HP_10-Songs/MMD.The_HP-Anthem window"
Echo $GuideView >t:StartGuide "HousePool_10:HousePool_10.guide"
;
Echo $MODPlay >t:StartSong2 "HousePool_10:HP_10-Songs/MOD.energy"
Echo $MEDPlay >t:StartSong3 "HousePool_10:HP_10-Songs/MOD.judgement"
Echo $MODPlay >t:StartPlayer " window"
;
Echo $PicViewer >t:dennis "HousePool_10:HP_10-Bilder/dennis-256.iff"
Echo $PicViewer >t:EHSEQ "HousePool_10:HP_10-Bilder/eh-256.iff"
Echo $PicViewer >t:EXTC "HousePool_10:HP_10-Bilder/xtc#?"
Echo $PicViewer >t:HPCap3 "HousePool_10:HP_10-Bilder/cap3-16.iff"
Echo $PicViewer >t:HPCap4 "HousePool_10:HP_10-Bilder/cap4-16.iff"
;
Echo "Fertig ! Lade Hauptteil !"
Run >NIL: execute t:StartHPAnim
Run >NIL: execute t:StartTheme
Wait 3 secs
Execute t:StartGuide
;
Echo "Bis bald !"
Echo "Entferne Zuweisung und Variablen..."
Assign Libs: HousePool_10:Libs REMOVE
Assign HousePool_10: REMOVE
;
Delete >NIL: t:StartHPAnim
Delete >NIL: t:StartTheme
Delete >NIL: t:StartGuide
Delete >NIL: t:StartSong2
Delete >NIL: t:StartSong3
Delete >NIL: t:dennis
Delete >NIL: t:ehsequencer
Delete >NIL: t:EXTC
Delete >NIL: t:HPCap3
Delete >NIL: t:HPCap4
;
UnSet PicViewer
UnSet AnimView
UnSet GuideView
UnSet MODPlay
UnSet MEDPlay
;
; © 1995-96 by Carsten Marmulla
; HousePool® Media International / HousePool Magazine